home *** CD-ROM | disk | FTP | other *** search
/ Atari Forever 4 / Atari Forever 4.zip / Atari Forever 4.iso / SERIE_DM / DM_022 / BEISPIEL.SOU < prev    next >
Text File  |  1998-03-14  |  2KB  |  101 lines
  1.  
  2. {---------------------------------------------------
  3.  
  4.            Storyboard von BEISPIEL.STR
  5.  
  6.      Abgespeichert aus Zeichenprogramm DENISE
  7.    ( Kommentare wurden nachträglich eingefügt )
  8.  
  9. ---------------------------------------------------}
  10.  
  11.  
  12. { Niedere Auflösung wählen. Wahlweise kann aber
  13.   auch die mittlere oder die hohe Auflösung
  14.   gewählt werden }
  15.  
  16. resolution HIGH;
  17.  
  18.  
  19. { Titel definieren }
  20.  
  21. title [ Quellcode aus "BEISPIEL.STR" ];
  22.  
  23.  
  24. { Bilder definieren }
  25.  
  26. picture  ARA, BOOT_1 ,BOOT_2, BOOT_3, BOOT_4, HAUS, ROSE;
  27.  
  28.  
  29. { Hauptprogramm }
  30.  
  31. main;
  32.  
  33.    load BLACK;
  34.  
  35.    fade ROSE using SUNRISE ( 0, FULL, 750, 500, 500 );
  36.  
  37.    fade ROSE using BITS;
  38.  
  39.    pause ( 100 );
  40.  
  41.    fade BLACK using CUBE_DOWN ( 100 );
  42.  
  43.    fade ARA using CHESS ( 400, 1 );
  44.  
  45.    keyoff ( 0 );
  46.  
  47.    repeat;
  48.  
  49.       fade ARA using CUBE_UP ( 0 );
  50.  
  51.    until 5;
  52.  
  53.    keyoff ( 100 );
  54.  
  55.    fade ARA using FADE_OUT ( 50, $000 );
  56.  
  57.    fade BOOT_1 using FADE_IN ( 150, $000 );
  58.  
  59.    pause ( 200 );
  60.  
  61.    fade BOOT_2   using SLIME ( 0, DOWN );
  62.  
  63.    pause ( 100 );
  64.  
  65.    fade BOOT_3   using MEMORY ( 0, 2, 3 );
  66.  
  67.    pause ( 200 );
  68.  
  69.    fade BOOT_4 using MIKADO ( 0, FULL, 1000 );
  70.  
  71.    fade BOOT_4 using BITS;
  72.  
  73.    pause ( 100 );
  74.  
  75.    fade BLACK using FRAME ( 0, FULL, 0, 0, 999, 999, 500 );
  76.  
  77.    fade HAUS using FLAP_UP ( 100 );
  78.  
  79.    pause ( 200 );
  80.  
  81.    fade BLACK using ZIPPER;
  82.  
  83.    load BLACK;
  84.  
  85.    WINDOW ( 0, 0, 600, 600 );          { Voreinstellungen für }
  86.    MIRROR ( %01111 );                  { die Grafik-Spielerei }
  87.    REDRAW ( 0, FULL, 100, DESTIN );
  88.    RANDOM ( 572517 );
  89.  
  90.    fade WHITE using FOLLY ( 0, FULL, 500, 116, 125, 259, 310 );
  91.  
  92.    DEFAULT;
  93.  
  94.    fade BLACK using SPLIT;
  95.  
  96.  
  97. { Programmende }
  98.  
  99. repeat_main;
  100.  
  101.